Option Explicit
'u@Ҳ
Private Sub CommandButton1_GotFocus()
    Msgbox "CommandButton1_GotFocus"
End Sub
